home *** CD-ROM | disk | FTP | other *** search
/ Educational Software Cooperative 4 / Educational Software Cooperative 4.iso / owlcatv9 / owl.bat < prev    next >
DOS Batch File  |  1996-03-31  |  11KB  |  400 lines
  1. ECHO OFF
  2. CLS
  3. disp owlopen.scr 1
  4. pause > nul
  5. :MENU
  6. DISP OWLMENU1.SCR 2
  7. HILITE 36 1 38 12 2
  8. IF ERRORLEVEL 12 GOTO QUIT
  9. IF ERRORLEVEL 11 GOTO SSHOW
  10. IF ERRORLEVEL 10 GOTO SPECIAL
  11. IF ERRORLEVEL 9 GOTO COPY
  12. IF ERRORLEVEL 8 GOTO PRINT
  13. IF ERRORLEVEL 7 GOTO MONOLIST
  14. IF ERRORLEVEL 6 GOTO REG
  15. IF ERRORLEVEL 5 GOTO TOPTEN
  16. IF ERRORLEVEL 4 GOTO VIEW
  17. IF ERRORLEVEL 3 GOTO ORDER
  18. IF ERRORLEVEL 2 GOTO USING
  19. IF ERRORLEVEL 1 GOTO INFO
  20. IF ERRORLEVEL 0 GOTO MENU
  21. :SSHOW
  22. DISP SLIDMENU.SCR 2
  23. HILITE 36 1 38 7 3
  24. IF ERRORLEVEL 7 GOTO MENU
  25. IF ERRORLEVEL 6 GOTO ALSLIDE
  26. IF ERRORLEVEL 5 GOTO WISLIDE
  27. IF ERRORLEVEL 4 GOTO MISLIDE
  28. IF ERRORLEVEL 3 GOTO SESLIDE
  29. IF ERRORLEVEL 2 GOTO JUSLIDE
  30. IF ERRORLEVEL 1 GOTO PSSLIDE
  31. IF ERRORLEVEL 0 GOTO SSHOW
  32. :ALSLIDE
  33. cls
  34. PICEM *.GIF
  35. GOTO SSHOW
  36. :WISLIDE
  37. cls
  38. PICEM ???????5.GIF
  39. GOTO SSHOW
  40. :MISLIDE
  41. cls
  42. PICEM ??????4?.GIF
  43. GOTO SSHOW
  44. :SESLIDE
  45. cls
  46. PICEM ?????3??.GIF
  47. GOTO SSHOW
  48. :JUSLIDE
  49. cls
  50. PICEM ????2???.GIF
  51. GOTO SSHOW
  52. :PSSLIDE
  53. cls
  54. PICEM ???1????.GIF
  55. GOTO SSHOW
  56.  
  57. :SPECIAL
  58. DISP EDPACK.SCR 2
  59. PAUSE > NUL
  60. DISP GAMEPACK.SCR 2
  61. PAUSE > NUL
  62. CLS
  63. PICEM WKC12---.GIF
  64. LIST OFFERS.OWL
  65. GOTO MENU
  66. :COPY
  67. CLS
  68. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  69. ECHO   ▓                                                             ▓
  70. ECHO   ▓        You selected item C - WHY NOT PASS A COPY OF         ▓
  71. ECHO   ▓        THIS CATALOGUE ON TO A FRIEND?                       ▓
  72. ECHO   ▓                                                             ▓
  73. ECHO   ▓        If you received this disk from a friend or           ▓
  74. ECHO   ▓        colleague please mention their name when you         ▓
  75. ECHO   ▓        make an order and we will send them a "THANK         ▓
  76. ECHO   ▓        YOU" voucher for a free disk.                        ▓
  77. ECHO   ▓                                                             ▓
  78. ECHO   ▓                 PRESS ANY KEY WHEN READY                    ▓
  79. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  80. PAUSE > NUL
  81. CLS
  82. TYPE BACKUP.OWL
  83. HILITE 19 7 36 3 3
  84. IF ERRORLEVEL 3 GOTO menu
  85. IF ERRORLEVEL 2 GOTO HARD
  86. IF ERRORLEVEL 1 GOTO TWOB
  87. IF ERRORLEVEL 0 GOTO COPY
  88. :HARD
  89. CLS
  90. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  91. ECHO   ▓                                                             ▓
  92. ECHO   ▓    Make sure you keep THIS DISK (source disk) in drive A    ▓
  93. ECHO   ▓    Have another blank disk (target disk) ready to insert    ▓
  94. ECHO   ▓    in drive A when so prompted. PRESS ANY KEY WHEN READY    ▓
  95. ECHO   ▓                                                             ▓
  96. ECHO   ▓ To EXIT without copying press Ctrl Break & type Y to prompt.▓
  97. ECHO   ▓                                                             ▓
  98. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  99. PAUSE > NUL
  100. DISKCOPY
  101. GOTO MENU
  102. :TWOB
  103. CLS
  104. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  105. ECHO   ▓                                                             ▓
  106. ECHO   ▓          Make sure you have THIS DISK in drive A:           ▓
  107. ECHO   ▓          Place a blank FORMATTED disk in drive B:           ▓
  108. ECHO   ▓              PRESS ANY KEY WHEN YOU ARE READY.              ▓
  109. ECHO   ▓                                                             ▓
  110. ECHO   ▓ To EXIT without copying press Ctrl Break & type Y to prompt.▓
  111. ECHO   ▓                                                             ▓
  112. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  113. PAUSE > NUL
  114. COPY A:*.* B: /V
  115. GOTO MENU
  116. :PRINT
  117. CLS
  118. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  119. ECHO   ▓  Check that your printer is on-line and paper is inserted.  ▓
  120. ECHO   ▓            PRESS ANY KEY WHEN YOU ARE READY.                ▓
  121. ECHO   ▓ If you have no printer just list disk nos on a sheet of     ▓
  122. ECHO   ▓ paper. Don't forget to state which size disks you need.     ▓
  123. ECHO   ▓To EXIT without printing press Ctrl Break & type Y to prompt.▓
  124. ECHO   ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  125. PAUSE > NUL
  126. COPY FORM1.OWL PRN
  127. PAUSE > NUL
  128. GOTO MENU
  129. :MONOLIST
  130. LIST MONO.OWL
  131. GOTO MENU
  132. :REG
  133. list reg.OWL
  134. GOTO MENU
  135. :TOPTEN
  136. CLS
  137. ECHO     ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  138. ECHO     ▓                                                             ▓
  139. ECHO     ▓  To assist new customers we have compiled six charts. These ▓
  140. ECHO     ▓  reflect current favourites in several categories, based on ▓
  141. ECHO     ▓  sales from Jan 95 - Dec 95. Those with older PCs (ie. any- ▓
  142. ECHO     ▓  thing less than a 386 with 4MB RAM and a soundcard) should ▓
  143. ECHO     ▓  check system requirements carefully before ordering.       ▓
  144. ECHO     ▓                                                             ▓
  145. ECHO     ▓  If you cannot  find the description of a listed program,   ▓
  146. ECHO     ▓  use the CHECKLIST option from the menu to find out where   ▓
  147. ECHO     ▓  the program is located. Programs are listed numerically,   ▓
  148. ECHO     ▓  so make a note of the disk number.                         ▓
  149. echo     ▓                                                             ▓
  150. echo     ▓  NOTE: ALL COLOURED HELP SCREENS (INCLUDING TOPTEN CHARTS)  ▓
  151. echo     ▓  CAN BE PRINTED OUT FOR EASY REFERENCE. SIMPLY PRESS PrtSc  ▓
  152. ECHO     ▓  KEY WHILST VIEWING (MAKING SURE PRINTER IS ON-LINE FIRST)  ▓
  153. ECHO     ▓                                                             ▓
  154. ECHO     ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  155. PAUSE > NUL
  156. DISP TOPTEN1.SCR 2
  157. PAUSE > NUL
  158. DISP TOPTEN2.SCR 2
  159. PAUSE > NUL
  160. DISP TOPTEN3.SCR 2
  161. PAUSE > NUL
  162. CLS
  163. ECHO     ▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  164. ECHO     ▒   SCREEN SHOTS OF MANY BEST SELLERS CAN BE VIEWED IN OUR   ▒
  165. ECHO     ▒   NEW SLIDE SHOW. PRESS "N" FROM OUR MAIN MENU SCREEN...   ▒
  166. ECHO     ▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  167. PAUSE > NUL
  168. GOTO MENU
  169. :VIEW
  170. CLS
  171. DISP OWLMENU2.SCR 2
  172. HILITE 36 3 38 11 2
  173. IF ERRORLEVEL 11 GOTO MENU
  174. IF ERRORLEVEL 10 GOTO SLIDES
  175. IF ERRORLEVEL 9 GOTO NEW
  176. IF ERRORLEVEL 8 GOTO CHKLIST
  177. IF ERRORLEVEL 7 GOTO PRNLIB
  178. if errorlevel 6 goto hobby
  179. IF ERRORLEVEL 5 GOTO THEME
  180. if ERRORLEVEL 4 GOTO MISC
  181. IF ERRORLEVEL 3 GOTO WINDOW
  182. IF ERRORLEVEL 2 GOTO GAME
  183. IF ERRORLEVEL 1 GOTO EDUC
  184. IF ERRORLEVEL 0 GOTO VIEW
  185. :SLIDES
  186. CLS
  187. TYPE SLIDE.OWL
  188. PAUSE > NUL
  189. GOTO VIEW
  190. :NEW
  191. LIST NEW.owl
  192. GOTO VIEW
  193. :CHKLIST
  194. LIST CHECK.OWL
  195. GOTO VIEW
  196. :PRNLIB
  197. CLS
  198. ECHO    ▓▓▓▓▓▓▓▓▓▓   HOW TO PRINT THE CATALOGUE TEXT FILES  ▓▓▓▓▓▓▓▓▓▓
  199. ECHO    ▓  ┌────────────────────────────────────────────────────────┐  ▓
  200. ECHO    ▓  │ This will print all the text files - you will need a   │  ▓
  201. ECHO    ▓  │ lot of paper! If you just want to print out a few      │  ▓
  202. ECHO    ▓  │ pages of particular interest simply press P key whilst │  ▓
  203. ECHO    ▓  │ viewing the catalogue. More details on this under the  │  ▓
  204. ECHO    ▓  │ "Using this catalogue" option on the main menu.        │  ▓
  205. ECHO    ▓  │                                                        │  ▓
  206. ECHO    ▓  │ IF YOU DO NOT WISH TO PRINT THE COMPLETE CATALOGUE NOW │  ▓
  207. ECHO    ▓  │ PLEASE PRESS CTRL BREAK AND ANSWER YES TO THE PROMPT.  │  ▓
  208. ECHO    ▓  │                                                        │  ▓
  209. ECHO    ▓  │ If you wish to continue please check that your printer │  ▓
  210. ECHO    ▓  │ is on-line and then press any key. THANK YOU.          │  ▓
  211. ECHO    ▓  │                                                        │  ▓
  212. ECHO    ▓  │  Approx. 105 pages of descriptions (at 60 lines/page)  │  ▓
  213. ECHO    ▓  └────────────────────────────────────────────────────────┘  ▓
  214. ECHO    ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  215. PAUSE > NUL
  216. COPY *.TXT PRN
  217. GOTO VIEW
  218. :hobby
  219. list hobby.txt
  220. goto view
  221. :THEME
  222. LIST THEME.TXT
  223. GOTO VIEW
  224. :MISC
  225. CLS
  226. DISP MISCMENU.SCR 2
  227. HILITE 36 3 38 4 4
  228. IF ERRORLEVEL 4 GOTO VIEW
  229. IF ERRORLEVEL 3 goto m-clip
  230. IF ERRORLEVEL 2 GOTO m-grap
  231. IF ERRORLEVEL 1 GOTO m-tool
  232. IF ERRORLEVEL 0 GOTO misc
  233. :m-clip
  234. list m-clip.txt
  235. goto misc
  236. :m-grap
  237. list m-grap.txt
  238. goto misc
  239. :m-tool
  240. list m-tool.txt
  241. goto misc
  242. :WINDOW
  243. CLS
  244. DISP WININTRO.SCR 2
  245. PAUSE > NUL
  246. :WINDOW2
  247. DISP WINMENU.SCR 2
  248. HILITE 36 3 38 6 2
  249. IF ERRORLEVEL 6 GOTO view
  250. IF ERRORLEVEL 5 GOTO W-HOBB
  251. IF ERRORLEVEL 4 goto w-grap
  252. IF ERRORLEVEL 3 GOTO w-util
  253. IF ERRORLEVEL 2 GOTO w-game
  254. IF ERRORLEVEL 1 GOTO w-educ
  255. IF ERRORLEVEL 0 GOTO window2
  256. :W-HOBB
  257. LIST W-HOBB.TXT
  258. GOTO WINDOW2
  259. :w-grap
  260. list w-grap.txt
  261. goto window2
  262. :w-util
  263. list w-util.txt
  264. goto window2
  265. :w-game
  266. list w-game.txt
  267. goto window2
  268. :w-educ
  269. list w-educ.txt
  270. goto window2
  271.  
  272. :GAME
  273. CLS
  274. DISP gamemenu.SCR 2
  275. HILITE 33 3 44 9 2
  276. IF ERRORLEVEL 9 GOTO view
  277. IF ERRORLEVEL 8 GOTO g-puzzle
  278. IF ERRORLEVEL 7 GOTO g-trad
  279. IF ERRORLEVEL 6 GOTO g-memory
  280. IF ERRORLEVEL 5 GOTO g-apogee
  281. if errorlevel 4 goto g-vga
  282. IF ERRORLEVEL 3 GOTO g-ega
  283. IF ERRORLEVEL 2 GOTO g-cga
  284. IF ERRORLEVEL 1 GOTO g-any
  285. IF ERRORLEVEL 0 GOTO game
  286. :g-puzzle
  287. list g-puzzle.txt
  288. goto game
  289. :g-trad
  290. list g-trad.txt
  291. goto game
  292. :g-memory
  293. list g-memory.txt
  294. goto game
  295. :g-apogee
  296. list g-apogee.txt
  297. goto game
  298. :g-vga
  299. list g-vga.txt
  300. goto game
  301. :g-ega
  302. list g-ega.txt
  303. goto game
  304. :g-cga
  305. list g-cga.txt
  306. goto game
  307. :g-any
  308. list g-any.txt
  309. goto game
  310.  
  311. :EDUC
  312. CLS
  313. DISP edmenu.SCR 2
  314. HILITE 33 3 44 11 2
  315. IF ERRORLEVEL 11 GOTO VIEW
  316. IF ERRORLEVEL 10 GOTO e-human
  317. IF ERRORLEVEL 9 GOTO e-forei
  318. IF ERRORLEVEL 8 GOTO e-lang
  319. IF ERRORLEVEL 7 GOTO e-scien
  320. IF ERRORLEVEL 6 GOTO e-smath
  321. IF ERRORLEVEL 5 GOTO e-jmath
  322. if errorlevel 4 goto e-jengl
  323. IF ERRORLEVEL 3 GOTO e-draw
  324. IF ERRORLEVEL 2 GOTO e-presc
  325. IF ERRORLEVEL 1 GOTO e-baby
  326. IF ERRORLEVEL 0 GOTO educ
  327. :e-human
  328. list e-human.txt
  329. goto educ
  330. :e-forei
  331. list e-forei.txt
  332. goto educ
  333. :e-lang
  334. list e-lang.txt
  335. goto educ
  336. :e-scien
  337. list e-scien.txt
  338. goto educ
  339. :e-smath
  340. list e-smath.txt
  341. goto educ
  342. :e-jmath
  343. list e-jmath.txt
  344. goto educ
  345. :e-jengl
  346. list e-jengl.txt
  347. goto educ
  348. :e-draw
  349. list e-draw.txt
  350. goto educ
  351. :e-presc
  352. list e-presc.txt
  353. goto educ
  354. :e-baby
  355. list e-baby.txt
  356. goto educ
  357. :ORDER
  358. CLS
  359. DISP PRICES.SCR 2
  360. PAUSE > NUL
  361. GOTO MENU
  362. :USING
  363. CLS
  364. disp ABBREV1.scr 2
  365. pause > nul
  366. DISP ABBREV2.SCR 1
  367. PAUSE > NUL
  368. DISP ABBREV3.SCR 1
  369. PAUSE > NUL
  370. disp ABBREV4.SCR 1
  371. PAUSE > NUL
  372. GOTO MENU
  373. :INFO
  374. CLS
  375. DISP OWLINFO.SCR 2
  376. PAUSE > NUL
  377. disp owlinfo2.scr 2
  378. pause > nul
  379. GOTO MENU
  380. :QUIT
  381. CLS
  382. PICEM WKC12---.GIF
  383. DISP EDPACK.SCR 2
  384. PAUSE > NUL
  385. DISP GAMEPACK.SCR 1
  386. PAUSE > NUL
  387. DISP END.SCR 1
  388. PAUSE > NUL
  389. ECHO   GO ON! TRY SOME SHAREWARE TODAY - YOU'LL BE PLEASANTLY SURPRISED!
  390. PAUSE > NUL
  391. CLS
  392. ECHO    ═════════════════════════════════════════════════════════════════
  393. ECHO    FINAL NOTE FOR WINDOWS 95 USERS
  394. ECHO    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  395. ECHO    PROGRAMS HAVE NOT YET BEEN TESTED UNDER WINDOWS 95 BUT ALL SHOULD
  396. ECHO    RUN CORRECTLY.  OUR HELP SCREENS ASSUME YOU HAVE DOS OR WIN 3.1 -
  397. ECHO    INSTALLATION PROCEDURES WILL BE SLIGHTLY DIFFERENT UNDER WIN 95
  398. ECHO    ═════════════════════════════════════════════════════════════════
  399. PAUSE > NUL
  400.